home *** CD-ROM | disk | FTP | other *** search
/ Bath / Bath CDROM.iso / pc / SYSCHECK.DXR / 00001.ls next >
Encoding:
Text File  |  2001-07-26  |  875 b   |  29 lines
  1. on exitFrame
  2.   if (getAt(getAt(the desktopRectList, 1), 3) < 800) or (getAt(getAt(the desktopRectList, 1), 4) < 600) then
  3.     member("ErrorMessage").text = "This CD-ROM is designed for 800 x 600 screen resolution. Please adjust your display settings and try again. Click here to exit."
  4.     go("error")
  5.     return 
  6.   end if
  7.   if the colorDepth < 16 then
  8.     set the colorDepth to 16
  9.     if the colorDepth < 16 then
  10.       member("ErrorMessage").text = "This CD-ROM requires 16-bit colour. Please adjust your display settings and try again. Click here to exit"
  11.       go("error")
  12.       return 
  13.     else
  14.       if the platform contains "Mac" then
  15.         open("setup")
  16.         quit()
  17.       else
  18.         open("setup.exe")
  19.         quit()
  20.       end if
  21.     end if
  22.   end if
  23.   if QuickTimeVersion() <= 2.10000000000000009 then
  24.     go("qtinstall")
  25.     return 
  26.   end if
  27.   go("passed")
  28. end
  29.